#!
$a = 50;
$a += 100;
$a .= " is a number\n";
$ref = \$a; # this is a reference 

@array = (1,2,3,"a","string");
%hash = ("Peter"=>"Mary","John"=>"Rose","Smith"=>"Linda");

$size = @array;
